home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / gtxt.arc / GTXT_COM.BAT next >
Encoding:
DOS Batch File  |  1987-03-11  |  727 b   |  22 lines
  1. echo off
  2. If  !%1==!       Input What is the file name, without its extension? 
  3. If  !%1==!       Set filenam=%ANS%
  4. If  !%2==!       Input What is the file extension? 
  5. If  !%2==!       Set fileext=%ANS%
  6. If  !%1==!       goto doit1
  7. If  !%filenam%==! Goto end
  8. goto doit2
  9. :doit1
  10. if exist %filenam%.COM echo A file named %filenam%.COM already exists in this directory.
  11. if exist %filenam%.COM goto end
  12. Copy gtxt.000+%filenam%.%fileext%+gtxt.dat %filenam%.com >nul
  13. Echo The file %filenam%.COM has been created.
  14. Goto end
  15. :doit2
  16. if exist %1.COM echo A file named %1.COM already exists in this directory.
  17. if exist %1.COM goto end
  18. Copy gtxt.000+%1.%2+gtxt.dat %1.com >nul
  19. Echo The file %1.COM has been created.
  20. :end
  21. 
  22.